home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh9x / sh94a.d64 / turtle-demo 2 (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  217b  |  11 lines
  1. 1 REM TURTLE-DEMO: 'VIERECK'
  2. 2 REM N. HEUSLER 11.91
  3. 3 :
  4. 10 SYS49152
  5. 20 INPUT"WINKEL   89[157][157][157][157]";AN
  6. 30 !INIT:!GRAPHICS:SZ=75
  7. 40 !PEN0:!MOVE160+SZ,100+SZ:!PEN1
  8. 50 D=SZ*2
  9. 60 !WALKD:D=D-1:!TURNLAN:IFD>1THEN60
  10. 70 !FINISH
  11.